{**************************************
Begena Qingit 01 65.93hz
MIDI note 60 (C4) = 65.92999999999999 Hz
Created using Scale Workshop 3.2.0

https://scaleworkshop.plainsound.org/scale/Q_xpiawLl
****************************************}

on init
declare %keynum[128]
declare %tune[128]
declare $bend
declare $key

%keynum[0] := 0
%tune[0] := 0
%keynum[1] := 1
%tune[1] := 0
%keynum[2] := 2
%tune[2] := 0
%keynum[3] := 3
%tune[3] := 0
%keynum[4] := 4
%tune[4] := 0
%keynum[5] := 5
%tune[5] := 0
%keynum[6] := 6
%tune[6] := 0
%keynum[7] := 7
%tune[7] := 0
%keynum[8] := 8
%tune[8] := 0
%keynum[9] := 9
%tune[9] := 0
%keynum[10] := 10
%tune[10] := 0
%keynum[11] := 11
%tune[11] := 0
%keynum[12] := 12
%tune[12] := 0
%keynum[13] := 13
%tune[13] := 0
%keynum[14] := 14
%tune[14] := 0
%keynum[15] := 15
%tune[15] := 0
%keynum[16] := 16
%tune[16] := 0
%keynum[17] := 17
%tune[17] := 0
%keynum[18] := 18
%tune[18] := 0
%keynum[19] := 19
%tune[19] := 0
%keynum[20] := 20
%tune[20] := 0
%keynum[21] := 21
%tune[21] := 0
%keynum[22] := 22
%tune[22] := 0
%keynum[23] := 23
%tune[23] := 0
%keynum[24] := 24
%tune[24] := 0
%keynum[25] := 25
%tune[25] := 0
%keynum[26] := 26
%tune[26] := 0
%keynum[27] := 27
%tune[27] := 0
%keynum[28] := 28
%tune[28] := 0
%keynum[29] := 29
%tune[29] := 0
%keynum[30] := 30
%tune[30] := 0
%keynum[31] := 31
%tune[31] := 0
%keynum[32] := 32
%tune[32] := 0
%keynum[33] := 33
%tune[33] := 0
%keynum[34] := 34
%tune[34] := 0
%keynum[35] := 35
%tune[35] := 0
%keynum[36] := 36
%tune[36] := 0
%keynum[37] := 37
%tune[37] := 0
%keynum[38] := 38
%tune[38] := 0
%keynum[39] := 39
%tune[39] := 0
%keynum[40] := 40
%tune[40] := 0
%keynum[41] := 41
%tune[41] := 0
%keynum[42] := 42
%tune[42] := 0
%keynum[43] := 43
%tune[43] := 0
%keynum[44] := 44
%tune[44] := 0
%keynum[45] := 0
%tune[45] := 13804
%keynum[46] := 2
%tune[46] := 34179
%keynum[47] := 4
%tune[47] := -39027
%keynum[48] := 7
%tune[48] := 29447
%keynum[49] := 9
%tune[49] := -16128
%keynum[50] := 12
%tune[50] := 13804
%keynum[51] := 14
%tune[51] := 34179
%keynum[52] := 16
%tune[52] := -39027
%keynum[53] := 19
%tune[53] := 29447
%keynum[54] := 21
%tune[54] := -16128
%keynum[55] := 24
%tune[55] := 13804
%keynum[56] := 26
%tune[56] := 34179
%keynum[57] := 28
%tune[57] := -39027
%keynum[58] := 31
%tune[58] := 29447
%keynum[59] := 33
%tune[59] := -16128
%keynum[60] := 36
%tune[60] := 13804
%keynum[61] := 38
%tune[61] := 34179
%keynum[62] := 40
%tune[62] := -39027
%keynum[63] := 43
%tune[63] := 29447
%keynum[64] := 45
%tune[64] := -16128
%keynum[65] := 48
%tune[65] := 13804
%keynum[66] := 50
%tune[66] := 34179
%keynum[67] := 52
%tune[67] := -39027
%keynum[68] := 55
%tune[68] := 29447
%keynum[69] := 57
%tune[69] := -16128
%keynum[70] := 60
%tune[70] := 13804
%keynum[71] := 62
%tune[71] := 34179
%keynum[72] := 64
%tune[72] := -39027
%keynum[73] := 67
%tune[73] := 29447
%keynum[74] := 69
%tune[74] := -16128
%keynum[75] := 72
%tune[75] := 13804
%keynum[76] := 74
%tune[76] := 34179
%keynum[77] := 76
%tune[77] := -39027
%keynum[78] := 79
%tune[78] := 29447
%keynum[79] := 81
%tune[79] := -16128
%keynum[80] := 84
%tune[80] := 13804
%keynum[81] := 86
%tune[81] := 34179
%keynum[82] := 88
%tune[82] := -39027
%keynum[83] := 91
%tune[83] := 29447
%keynum[84] := 93
%tune[84] := -16128
%keynum[85] := 96
%tune[85] := 13804
%keynum[86] := 98
%tune[86] := 34179
%keynum[87] := 100
%tune[87] := -39027
%keynum[88] := 103
%tune[88] := 29447
%keynum[89] := 105
%tune[89] := -16128
%keynum[90] := 108
%tune[90] := 13804
%keynum[91] := 110
%tune[91] := 34179
%keynum[92] := 112
%tune[92] := -39027
%keynum[93] := 115
%tune[93] := 29447
%keynum[94] := 117
%tune[94] := -16128
%keynum[95] := 120
%tune[95] := 13804
%keynum[96] := 122
%tune[96] := 34179
%keynum[97] := 124
%tune[97] := -39027
%keynum[98] := 127
%tune[98] := 29447
%keynum[99] := 99
%tune[99] := 0
%keynum[100] := 100
%tune[100] := 0
%keynum[101] := 101
%tune[101] := 0
%keynum[102] := 102
%tune[102] := 0
%keynum[103] := 103
%tune[103] := 0
%keynum[104] := 104
%tune[104] := 0
%keynum[105] := 105
%tune[105] := 0
%keynum[106] := 106
%tune[106] := 0
%keynum[107] := 107
%tune[107] := 0
%keynum[108] := 108
%tune[108] := 0
%keynum[109] := 109
%tune[109] := 0
%keynum[110] := 110
%tune[110] := 0
%keynum[111] := 111
%tune[111] := 0
%keynum[112] := 112
%tune[112] := 0
%keynum[113] := 113
%tune[113] := 0
%keynum[114] := 114
%tune[114] := 0
%keynum[115] := 115
%tune[115] := 0
%keynum[116] := 116
%tune[116] := 0
%keynum[117] := 117
%tune[117] := 0
%keynum[118] := 118
%tune[118] := 0
%keynum[119] := 119
%tune[119] := 0
%keynum[120] := 120
%tune[120] := 0
%keynum[121] := 121
%tune[121] := 0
%keynum[122] := 122
%tune[122] := 0
%keynum[123] := 123
%tune[123] := 0
%keynum[124] := 124
%tune[124] := 0
%keynum[125] := 125
%tune[125] := 0
%keynum[126] := 126
%tune[126] := 0
%keynum[127] := 127
%tune[127] := 0
end on

on note
$key := %keynum[$EVENT_NOTE]
$bend := %tune[$EVENT_NOTE]
change_note ($EVENT_ID, $key)
change_tune ($EVENT_ID, $bend, 0)
end on
